Public Class SQLParseNoTable
    Inherits SQLParser

    Protected Overrides Function MyParserState() As SQLParserState
        Return SQLParserState.SQLParseNoTable
    End Function

    Protected Friend Overrides Sub ParseCommands(ByVal Commands() As String, ByRef tables As TableList)
        If Commands.Length < 2 Then Return
        If Commands(0).ToLower() = "create" And Commands(1).ToLower() = "table" Then
            Dim parser As New SQLParseCreateTable
            parser.ParseCommands(Commands, tables)
            Me.SetParserState(parser.GetParserState())
        ElseIf Commands(0).ToLower() = "alter" And Commands(1).ToLower() = "table" Then
            Me.SetParserState(SQLParserState.SQLParseAlterTable)
            Dim parser As New SQLParseAlterTable
            parser.ParseCommands(Commands, tables)
            Me.SetParserState(parser.GetParserState())
        End If
    End Sub
End Class
